10 REM #################################################################### 100 REM 110 REM < START UP > 120 REM 130 FADE 140 HIDE 150 POKE 160 REM 170 REM < DEFINE A FEW VARIABLES > 180 REM 190 VARNAME 20 REM > < 200 DIM 210 VARNAME 220 VARNAME 230 REM 240 REM < READY A SCREEN > 250 REM 260 ERASE 270 RESERVE 280 FILL 290 REM 30 REM > The MEGA Inter-lace Vertical Text Scroller < 300 REM < PLACE CHARACTERS ON IT > 310 REM 320 VARNAME 330 VARNAME 340 FOR 350 VARNAME 360 VARNAME 370 SPRITE 380 UPDATE 390 WAIT VBL 40 REM > written in STOS by Ben of FRS < 400 SCREEN COPY 410 VARNAME 420 IF 430 NEXT 440 SCREEN COPY 450 FILL 460 CLS 470 SPRITE 480 WAIT VBL 490 LOKE 50 REM > and remember to always eat your greens ! < 500 AUTO BACK 510 REM 520 REM < THIS IS THE TEXT THAT WILL BE SCROLLED > 530 REM < IT MUST BE IN BLOCKS OF 10 CHARACTERS! > 540 REM 550 VARNAME 560 VARNAME 570 VARNAME 580 VARNAME 590 VARNAME 60 REM > FRS r the best < 600 VARNAME 610 VARNAME 620 VARNAME 630 VARNAME 640 VARNAME 650 VARNAME 660 VARNAME 670 REM 680 REM < THIS IS MY SCROLL ROUTINE , HOPE YOU LIKE IT ! > 690 REM 70 REM > v1.02 { Lot better when compiled } < 700 LOGIC 710 VARNAME 720 FOR 730 VARNAME 740 FOR 750 VARNAME 760 IF 770 WAIT VBL 780 FOR 790 VARNAME 80 REM > < 800 VARNAME 810 IF 820 SCREEN COPY 830 NEXT 840 SCREEN COPY 850 SCREEN SWAP 860 NEXT 870 NEXT 880 GOTO 90 REM #######################=-> 13/2/1993 <-=############################